home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr11 / pdox693.zip / TI526.ASC < prev    next >
Text File  |  1992-08-12  |  1KB  |  67 lines

  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.   PRODUCT  :  PARADOX                                NUMBER  :  526
  8.   VERSION  :  ALL
  9.        OS  :  DOS
  10.      DATE  :  August 12, 1992                          PAGE  :  1/1
  11.  
  12.     TITLE  :  SCAN LOOP TO PLACE THE RECORD NUMBER
  13.               IN A REGULAR FIELD
  14.  
  15.  
  16.  
  17.  
  18.   This is an example of a simple scan loop.  The main purpose of a
  19.   scan is to examine each record of a table executing each group of
  20.   commands within the loop on each record.  We make use of a table
  21.   called TEST that has a numeric field called Number.
  22.  
  23.  
  24.   View "TEST"       ; Call the TEST table.
  25.   Editkey           ; Simulates pressing [F9] to Edit Mode.
  26.   Moveto[Number]    ; Move to the field named Number.
  27.   Scan              ; Start the scan loop.
  28.      [] = Recno()   ; Assign the record number to the field.
  29.   EndScan           ; Quit the scan loop.
  30.   Do_It!            ; Save the changes to the table.
  31.  
  32.  
  33.   DISCLAIMER: You have the right to use this technical information
  34.   subject to the terms of the No-Nonsense License Statement that
  35.   you received with the Borland product to which this information
  36.   pertains.
  37.  
  38.  
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67.